home *** CD-ROM | disk | FTP | other *** search
/ Flybox Trout (Edition 1) / Flybox Trout (Edition 1).iso / Setup / Support / FlyBox.swf / scripts / DefineSprite_172 / frame_20 / DoAction.as
Encoding:
Text File  |  2002-04-15  |  671 b   |  19 lines
  1. a = 0;
  2. while(6 >= a)
  3. {
  4.    AddWhat = (CurPage - 1) * 7;
  5.    if(eval("_root:Result" + (a + AddWhat) + "_FlyID") ne "")
  6.    {
  7.       set("Result" + a + ":FlyID",eval("_root:Result" + (a + AddWhat) + "_FlyID"));
  8.       set("Result" + a + ":FlyName",eval("_root:Result" + (a + AddWhat) + "_FlyName"));
  9.       set("Result" + a + ":Comments",eval("_root:Result" + (a + AddWhat) + "_Descript"));
  10.       loadMovie(eval("_root:CDDrive") + "/Thumbnails/" + eval("_root:Result" + (a + AddWhat) + "_Picture") + ".swf","Result" + a + ".SmallSWF");
  11.       setProperty("Result" + a, _visible, 1);
  12.    }
  13.    else
  14.    {
  15.       setProperty("Result" + a, _visible, 0);
  16.    }
  17.    a++;
  18. }
  19.